home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Stairway to Heaven
/
Stairway to Heaven.iso
/
tengoku
/
cdrom23.dir
/
00041_Script_41
< prev
next >
Wrap
Text File
|
1995-02-20
|
348b
|
14 lines
on enterFrame str
put "saori" into str
put FileIO(mNew,"?write","data2.tex") into myObj
if objectp(myObj) then
myObj(mWriteString,str)
myObj(mDispose)
-- return TRUE
go to frame 100
else if myObj <> -43 then
alert " can't file create :" & FileIO(mError,myObj)
end if
-- return FALSE
go to frame 100
end